﻿Public Class DocumentoClienteDetallePickeador

    Dim _CIA, _SUC, _ALM, _TDOC As String
    Dim _DCICOD, _DCDCOD, _PICKCOD As String
    Dim _DCDPCANT As Integer
    Dim _DCPCOD As Integer
    Dim _DCDPFECHAASIG As Date
    Dim _ESTCOD As String

    Sub New()

    End Sub

    Sub New(ByVal cia As String, ByVal suc As String, ByVal alm As String, ByVal tdoc As String, ByVal dcicod As String, ByVal dcdcod As String, ByVal dcpcod As Integer, _
            ByVal pickcod As String, ByVal dcdpCant As Integer, ByVal fechaasg As Date, ByVal estcod As String)
        Me._CIA = cia
        Me._SUC = suc
        Me._ALM = alm
        Me._TDOC = tdoc
        Me._DCICOD = dcicod
        Me._DCDCOD = dcdcod
        Me._DCPCOD = dcpcod
        Me._PICKCOD = pickcod
        Me._DCDPCANT = dcdpCant
        Me._DCDPFECHAASIG = fechaasg
        Me._ESTCOD = estcod
    End Sub

    Public Property CIA() As String
        Get
            Return _CIA
        End Get
        Set(ByVal value As String)
            _CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _SUC
        End Get
        Set(ByVal value As String)
            _SUC = value
        End Set
    End Property

    Public Property ALM_Codigo() As String
        Get
            Return _ALM
        End Get
        Set(ByVal value As String)
            _ALM = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _TDOC
        End Get
        Set(ByVal value As String)
            _TDOC = value
        End Set
    End Property

    Public Property DCI_Codigo() As String
        Get
            Return _DCICOD
        End Get
        Set(ByVal value As String)
            _DCICOD = value
        End Set
    End Property

    Public Property DCD_Codigo() As String
        Get
            Return _DCDCOD
        End Get
        Set(ByVal value As String)
            _DCDCOD = value
        End Set
    End Property

    Public Property PICK_Codigo() As String
        Get
            Return _PICKCOD
        End Get
        Set(ByVal value As String)
            _PICKCOD = value
        End Set
    End Property

    Public Property DCDP_Cantidad() As Integer
        Get
            Return _DCDPCANT
        End Get
        Set(ByVal value As Integer)
            _DCDPCANT = value
        End Set
    End Property

    Public Property EST_Codigo() As String
        Get
            Return _ESTCOD
        End Get
        Set(ByVal value As String)
            _ESTCOD = value
        End Set
    End Property

    Public Property DCP_Codigo() As Integer
        Get
            Return _DCPCOD
        End Get
        Set(ByVal value As Integer)
            _DCPCOD = value
        End Set
    End Property

    Public Property DCDP_FechaAsig() As Date
        Get
            Return _DCDPFECHAASIG
        End Get
        Set(ByVal value As Date)
            _DCDPFECHAASIG = value
        End Set
    End Property

End Class
